home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 2 / AACD 2.iso / AACD / Programming / fpc / doc / ref / img258.gif < prev    next >
Graphics Interchange Format  |  1998-09-25  |  2.0 KB  |  605x129  |  1-bit (2 colors)
   ocr: Functian DoDiv (X,Y: - Longint ): - Integer; begin If Y=0 then Raise EDIvException - Create ('Division by Zero would occur') Result : X Div Y; end;